home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 4 / PC World Interactive 4.iso / share / internet / death / _SETUP.1 / death.ini < prev    next >
INI File  |  1997-08-30  |  6KB  |  128 lines
  1. [dEATH]
  2.  
  3. [Users]
  4. n0=4:X-cise
  5.  
  6. [script]
  7. n0=;-----------------------------------
  8. n1=;     (dEATH ThrustPACK)
  9. n2=;      Channel Synch Info
  10. n3=;-----------------------------------
  11. n4=#scan.sync off
  12. n5=raw 366:*: {
  13. n6=  set %Sync.Temp $ticks | %Sync.Time = [ [ %Sync.Temp ] - [ %Sync.Time ] ]
  14. n7=  echo 3 $parm2 $timestamp *** Sync Information: (Ops/ $+ $opnick(0,$parm2) $+ ) (Non Ops/ $+ $nopnick(0,$parm2) $+ ) (Total/ $+ $nick(0,$parm2) $+ ) (Time/ $+ $left(1,%Sync.Time) $+ . $+ $right(3,%Sync.Time) Secs)
  15. n8=  echo 3 $parm2 $timestamp *** Now compiling user data from $parm2 $+ .... (Current/ $+ $ial(*,0) $+ ) | unset %Sync.* | who $parm2
  16. n9=}
  17. n10=raw 352:*: halt
  18. n11=raw 315:*: echo 3 $parm2 $timestamp *** Compiling of user data for $parm2 complete! (Total/ $+ $ial(*,0) $+ ) | .disable #Scan.Sync | halt
  19. n12=#Scan.Sync end
  20. n13=;-----------------------------------
  21. n14=;     (dEATH ThrustPACK)
  22. n15=;           IRCop Scan
  23. n16=;-----------------------------------
  24. n17=#scan.ircop off
  25. n18=raw 352:*: inc %Var.Total | echo 2 -a 6 $+ %Var.Total $+ . $parm6 1* $+ $parm5 | halt
  26. n19=raw 315:*: {
  27. n20=  echo 2 -a 6òòò IRCop ScanCompleted! Total: %Var.Total 6òòò 
  28. n21=  .disable #Scan.IRCop | halt
  29. n22=}
  30. n23=#Scan.IRCop end
  31. n24=;-----------------------------------
  32. n25=;     (dEATH ThrustPACK)
  33. n26=;         Channel Scan
  34. n27=;-----------------------------------
  35. n28=#scan.channel on
  36. n29=raw 352:* {
  37. n30=  if ($parm4 isin %Chan.Address) { inc %Chan.Clones } | else { %Chan.Address = %Chan.Address $parm4 }
  38. n31=  if (* isin $parm7) { inc %Chan.IRCops }
  39. n32=  if (@ isin $parm7) { inc %Chan.Ops } | else { inc %Chan.NonOps }
  40. n33=  if (+ isin $parm7) { inc %Chan.Voice } | else { inc %Chan.NonVoice }
  41. n34=  if (G isin $parm7) { inc %Chan.Gone }
  42. n35=  if (H isin $parm7) { inc %Chan.Here } | inc %Chan.Total | halt
  43. n36=}
  44. n37=raw 315:* {
  45. n38=  echo 2 -a 6òòò Stats for $parm2 6òòò 
  46. n39=  echo 2 -a 6òOps6ò %Chan.Ops 6òNonOps6ò %Chan.NonOps 
  47. n40=  echo 2 -a 6òVoice6ò %Chan.Voice  6òNon Voice6ò %Chan.NonVoice 
  48. n41=  echo 2 -a 6òAway6ò %Chan.Gone 6òHere6ò %Chan.Here 
  49. n42=  echo 2 -a 6òClones6ò %Chan.Clones 6òIRCops6ò %Chan.IRCops 
  50. n43=  echo 2 -a 6òòò Chan Stats Completed ! Total: %Chan.Total 6òòò 
  51. n44=  .disable #Scan.Channel | unset %Chan.* | halt
  52. n45=}
  53. n46=#Scan.Channel end
  54. n47=;-----------------------------------
  55. n48=;     (dEATH ThrustPACK)
  56. n49=;             User Scan
  57. n50=;-----------------------------------
  58. n51=#scan.user off
  59. n52=raw 401:*: set %User.Nick 0 | halt
  60. n53=raw 301:*: set %User.Away Yes | halt
  61. n54=raw 311:*: set %User.Nick $parm2 | set %User.Address $parm3 $+ @ $+ $parm4 | set %User.Name $parm6* | halt
  62. n55=raw 312:*: set %User.Server $parm3 | halt
  63. n56=raw 313:*: set %User.IRCop Yes | halt
  64. n57=raw 317:*: set %User.Idle $parm3 | halt
  65. n58=raw 319:*: set %User.Channels $parm3* | halt
  66. n59=raw 318:* {
  67. n60=  if (%User.Nick == 0) { echo 4 -a òò $parm2 no such nick! òò | halt }
  68. n61=  echo 2 -a 6òòò /whois info for: %User.Nick 6òòò 
  69. n62=  echo 2 -a 6òAddess6ò  %User.Address 
  70. n63=  echo 2 -a 6òRealname6ò  %User.Name 
  71. n64=  echo 2 -a 6òServer6ò  %User.Server 
  72. n65=  if (%User.Channels == $null) { echo 2 -a 6òChannels6ò None }
  73. n66=  else { echo 2 -a 6òChannels6ò %User.Channels }
  74. n67=  if (%User.Away != $null) { echo 2 -a 6òAway6ò %User.Away }
  75. n68=  if (%User.IRCop != $null) { echo 2 -a 6òIRCop6ò %User.IRCop }
  76. n69=  echo 2 -a 6òòò End of /whois for: %User.Nick 6òòò 
  77. n70=  unset %User.* | .disable #Scan.User | halt
  78. n71=}
  79. n72=#Scan.User end
  80. n73=;-----------------------------------
  81. n74=;     (dEATH ThrustPACK)
  82. n75=;           Flooder Scan
  83. n76=;-----------------------------------
  84. n77=#scan.flooder off
  85. n78=raw 352:* {
  86. n79=  if ($parm2 == *) { inc %Var.Total | echo 2 -a 6 %Var.Total $+ .   $parm6 1(none) | halt }
  87. n80=  if ($parm2 != *) { inc %Var.Total | echo 2 -a 6 %Var.Total $+ .  $parm6 1( $+ $parm2 $+ ) | halt }
  88. n81=}
  89. n82=raw 315:* {
  90. n83=  echo 2 -a 6òòò End of Flooders List! Total: %Var.Total 6òòò 
  91. n84=  .disable #Scan.Flooder | halt
  92. n85=}
  93. n86=#Scan.Flooder end
  94. n87=;-----------------------------------
  95. n88=;     (dEATH ThrustPACK)
  96. n89=;       Channel Filter Kick
  97. n90=;-----------------------------------
  98. n91=#filter.channel off
  99. n92=raw 352:* {
  100. n93=  if (%Filter.IRCops == Yes) {
  101. n94=    if (* isin $parm7) {
  102. n95=      if ($parm6 isop $parm2) { if (%Filter.Ops == No) { halt } } | if ($parm6 == $me) { halt }
  103. n96=      if (%Filter.Ban == Yes) { set %Var.Temp *!* $+ $parm3 $+ $parm4 | mode $parm2 +b $mask(%Var.Temp,3) }
  104. n97=      inc %Var.Victims 
  105. n98=      kick $parm2 $parm6 Filter Kick! - IRCops (dEATH ThrustPACK 3.1 | halt
  106. n99=    }
  107. n100=  }
  108. n101=  if (%Filter.Away == Yes) {
  109. n102=    if (G isin $parm7) {
  110. n103=      if ($parm6 isop $parm2) { if (%Filter.Ops == No) { halt } } | if ($parm6 == $me) { halt }
  111. n104=      if (%Filter.Ban == Yes) { set %Var.Temp *!* $+ $parm3 $+ $parm4 | mode $parm2 +b $mask(%Var.Temp,3) }
  112. n105=      inc %Var.Victims 
  113. n106=      kick $parm2 $parm6  Filter Kick! - Away Users (dEATH ThrustPACK 3.1 | halt
  114. n107=    }
  115. n108=  }
  116. n109=  if (%Filter.NonAway == Yes) {
  117. n110=    if (H isin $parm7) {
  118. n111=      if ($parm6 isop $parm2) { if (%Filter.Ops == No) { halt } } | if ($parm6 == $me) { halt }
  119. n112=      if (%Filter.Ban == Yes) { set %Var.Temp *!* $+ $parm3 $+ $parm4 | mode $parm2 +b $mask(%Var.Temp,3) }
  120. n113=      inc %Var.Victims 
  121. n114=      kick $parm2 $parm6  Filter Kick! - Non-away (dEATH ThrustPACK 3.1 | halt
  122. n115=    }
  123. n116=  }
  124. n117=  halt
  125. n118=}
  126. n119=raw 315:*: echo 6 $parm2  Filter Kick complete!  | unset %Filter.* | .disable #Filter.Channel | halt
  127. n120=#filter.channel off
  128.